home *** CD-ROM | disk | FTP | other *** search
/ Precision Software Appli…tions Silver Collection 1 / Precision Software Applications Silver Collection Volume One (PSM) (1993).iso / games / egavga / funquiz.arj / FQLVL13.BAT < prev    next >
DOS Batch File  |  1993-02-03  |  2KB  |  72 lines
  1.  
  2.  
  3. :THIS IS THE FQLVL13 BATCH FILE FOR MARA'S "FUNQUIZ"
  4.  
  5. ECHO OFF
  6. :13A
  7. LOADSCRN HLTHCH3.SCR
  8. WAIT K 3
  9. LOADSCRN EL3.SCR
  10. TICWRITE T 25 7 WHI BLU SPELLING
  11. TICWRITE T 19 12 WHI BLU WHICH IS CORRECT ?
  12. TICWRITE T 33 14 WHI BLU F1 APPOCALYPSE
  13. TICWRITE T 33 16 WHI BLU F2 APOCALIPSE
  14. TICWRITE T 33 18 WHI BLU F3 APOCALYPSE
  15. KEYPRESS F1 F2 F3
  16. IF ERRORLEVEL 3 GOTO R13A
  17. IF ERRORLEVEL 2 GOTO W13A
  18. IF ERRORLEVEL 1 GOTO W13A
  19. :W13A
  20. BEEPER W
  21. POPWIN 25 8 55 14 BLA RED 2
  22. WRITE 30 10 BLA RED C SORRY,
  23. WRITE 30 12 BLA RED C THAT'S WRONG.
  24. WAIT K 1
  25. GOTO END
  26. :R13A
  27. BEEPER R
  28. POPWIN 25 8 55 14 BLA GRE 2
  29. WRITE 30 10 BLA GRE C GOOD JOB
  30. WRITE 30 12 BLA GRE C RIGHT AGAIN.
  31. WAIT K 1
  32. GOTO 13B
  33. :13B
  34. LOADSCRN EL3.SCR
  35. TICWRITE T 25 7 WHI BLU MUSIC
  36. TICWRITE T 19 12 WHI BLU OSCAR WINNING SONG FROM "A STAR IS BORN".
  37. TICWRITE T 33 14 WHI BLU F1 EVERGREEN
  38. TICWRITE T 33 16 WHI BLU F2 LOVE STORY
  39. TICWRITE T 33 18 WHI BLU F3 THE ROSE
  40. KEYPRESS F1 F2 F3
  41. IF ERRORLEVEL 3 GOTO W13A
  42. IF ERRORLEVEL 2 GOTO W13A
  43. IF ERRORLEVEL 1 GOTO R13B
  44. :R13B
  45. BEEPER R
  46. POPWIN 25 8 55 14 BLA GRE 2
  47. WRITE 30 10 BLA GRE C NICE WORK
  48. WRITE 30 12 BLA GRE C YOU'RE ON A ROLL.
  49. WAIT K 1
  50. GOTO 13C
  51. :13C
  52. LOADSCRN EL3.SCR
  53. TICWRITE T 25 7 WHI BLU GEOGRAPHY
  54. TICWRITE T 19 12 WHI BLU WHICH U.S. STATE HAS THE LEAST RAINFALL ?
  55. TICWRITE T 33 14 WHI BLU F1 ARIZONA
  56. TICWRITE T 33 16 WHI BLU F2 NEVADA
  57. TICWRITE T 33 18 WHI BLU F3 NEW MEXICO
  58. KEYPRESS F1 F2 F3
  59. IF ERRORLEVEL 3 GOTO W13A
  60. IF ERRORLEVEL 2 GOTO R13C
  61. IF ERRORLEVEL 1 GOTO W13A
  62. :R13C
  63. BEEPER R
  64. POPWIN 25 8 55 14 BLA GRE 2
  65. WRITE 30 10 BLA GRE C NICE WORK,
  66. WRITE 30 12 BLA GRE C YOU'VE GOT IT.
  67. WAIT K 1
  68. FQLVL21.BAT
  69. :END
  70. FQLOSE.BAT
  71.  
  72.